home *** CD-ROM | disk | FTP | other *** search
/ Nebula 2 / Nebula Two.iso / Apps / Clocks / Hours / chimes / three.score < prev    next >
Encoding:
Text File  |  1995-06-12  |  742 b   |  27 lines
  1. part bell;
  2. bell synthPatch:"Fm1i" synthPatchCount:9; 
  3.  
  4. envelope ampFun =  [(0,0)(.005,1)(6,0)|(14,0.0)(15,0)];
  5. envelope freqFun =  [(0,1)(.005,1.06)(.01,1)(10,1)|(14,.9,2)];
  6. envelope indxFun =  [(0,2)(.005,1)(10,0,.3)|(14,0.0)];
  7.  
  8. waveTable wave1  = [{1,1}{3,.1}]; 
  9.  
  10.  
  11. BEGIN;
  12. bell (noteUpdate) waveform:wave1 m1Ratio:3.4
  13.         m1Ind1:.4 amp:0.2 ampEnv:ampFun freqEnv:freqFun m1IndEnv:indxFun;
  14. /* We can put information which is reapplied to each new phrase
  15.    in a noteUpdate with no tag. In this case, each note is a new 'phrase',
  16.    since there is no note tag. The note itself may override the information. */
  17.  
  18. t .001;
  19. bell (4.1) freq:d6 bearing:45;
  20. t .75;
  21. bell (4.1) freq:d6 bearing:45;
  22. t 1.5;
  23. bell (4.1) freq:d6 bearing:45;
  24. t 2.25;
  25. END;
  26.  
  27.